home *** CD-ROM | disk | FTP | other *** search
- /*
- * Copyright 1991, 1992, 1993, 1994, Silicon Graphics, Inc.
- * All Rights Reserved.
- *
- * This is UNPUBLISHED PROPRIETARY SOURCE CODE of Silicon Graphics, Inc.;
- * the contents of this file may not be disclosed to third parties, copied or
- * duplicated in any form, in whole or in part, without the prior written
- * permission of Silicon Graphics, Inc.
- *
- * RESTRICTED RIGHTS LEGEND:
- * Use, duplication or disclosure by the Government is subject to restrictions
- * as set forth in subdivision (c)(1)(ii) of the Rights in Technical Data
- * and Computer Software clause at DFARS 252.227-7013, and/or in similar or
- * successor clauses in the FAR, DOD or NASA FAR Supplement. Unpublished -
- * rights reserved under the Copyright Laws of the United States.
- */
- /*
- * canfile -
- * Read and write canvases on stdin and stdout
- *
- * Paul Haeberli - 1992
- *
- * exports
- *
- void canvastofile(c,f);
- canvas *filetocanvas(f);
- *
- */
- #include "stdio.h"
- #include "canvas.h"
-
- #define CANVASMAGIC (0x69313232)
- static canvas *rc;
-
- canvastofile(c,f)
- canvas *c;
- FILE *f;
- {
- long magic;
-
- magic = CANVASMAGIC;
- fwrite(&magic,sizeof(long),1,f);
- fwrite(c,sizeof(canvas),1,f);
- fwrite(c->data,c->xsize*c->ysize*sizeof(long),1,f);
- fflush(f);
- }
-
- canvas *filetocanvas(f)
- FILE *f;
- {
- long magic;
- unsigned long *data;
- canvas tc;
-
- magic = CANVASMAGIC;
- if(!fread(&magic,sizeof(long),1,f))
- return 0;
- if(magic != CANVASMAGIC)
- return 0;
- if(!fread(&tc,sizeof(canvas),1,f))
- return 0;
- if(!rc || rc->xsize != tc.xsize || rc->ysize != tc.ysize) {
- if(rc)
- freecanvas(rc);
- rc = newcanvas(tc.xsize,tc.ysize);
- data = rc->data;
- *rc = tc;
- rc->data = data;
- }
- if(!fread(rc->data,rc->xsize*rc->ysize*sizeof(long),1,f))
- return 0;
- return rc;
- }
-